home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / S-Sh / SCB 4.0.cpt / Script Cat Burglar 4.0 / card_5096.txt < prev    next >
Text File  |  1988-03-21  |  2KB  |  63 lines
  1. -- card: 5096 from stack: in.0
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2227
  5. -- name: Cat's Meow
  6.  
  7.  
  8. -- part contents for background part 15
  9. ----- text -----
  10. This stack was designed by     Philip A. Mohr, Jr.    4405 N. Rosemead    Rosemead, CA 91770
  11.  
  12. -- part contents for background part 2
  13. ----- text -----
  14. Cat's Meow
  15.  
  16. -- part contents for background part 3
  17. ----- text -----
  18. This Stack
  19.  
  20. -- part contents for background part 13
  21. ----- text -----
  22. Button
  23.  
  24. -- part contents for background part 58
  25. ----- text -----
  26. on mouseUp
  27.   Get the visible of card field "Mouse Hider"
  28.   if it is true then
  29.     Show card button "Squeek Holder"
  30.     Show card field "Squeek"
  31.     wait 30
  32.     hide card field "Squeek"
  33.     hide card button "Squeek Holder"
  34.     show card field "Info Field"
  35.   else
  36.     Show card button "Meow Holder"
  37.     Show card field "Meow"
  38.     wait 30
  39.     hide card field "Meow"
  40.     hide card button "Meow Holder"
  41.   end if
  42. end mouseUp
  43.  
  44.  
  45. -- part contents for background part 14
  46. ----- text -----
  47. earlier version
  48. This script is for the button over the cat's mouth. 
  49. If the field that hides the mouse picture is hidden. it shows an ICON button, the field "Meow," and hides them. 
  50. If the field that hides the mouse picture is visible. it shows an ICON button, the field "Squeek,"  hides them, and shows the info field. 
  51.  
  52.  
  53. -- part contents for background part 67
  54. ----- text -----
  55. Hide Notes
  56.  
  57. -- part contents for background part 68
  58. ----- text -----
  59. 5096
  60.  
  61. -- part contents for background part 73
  62. ----- text -----
  63. Before I can do that, you   need to give the script   a name.  Sorry.  Try again.